home *** CD-ROM | disk | FTP | other *** search
/ CD School House 9 / CD School House 9.0 - Wayzata Technology (1994).iso / pc / games / mac / __sports__ / sports_trivia__ / baseball / card_7196.txt < prev    next >
Text File  |  1990-03-18  |  2KB  |  100 lines
  1. -- card: 7196 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2776
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   put empty into field "number correct"
  9.   put empty into field "number wrong"
  10.   wait 50
  11. end openCard
  12.  
  13.  
  14.  
  15.  
  16.  
  17.  
  18.  
  19.  
  20.  
  21.  
  22.  
  23.  
  24.  
  25.  
  26.  
  27.  
  28.  
  29.  
  30.  
  31.  
  32. -- part 12 (button)
  33. -- low flags: 00
  34. -- high flags: 8003
  35. -- rect: left=0 top=282 right=342 bottom=69
  36. -- title width / last selected line: 0
  37. -- icon id / first selected line: 301 / 301
  38. -- text alignment: 1
  39. -- font id: 0
  40. -- text size: 12
  41. -- style flags: 0
  42. -- line height: 16
  43. -- part name: Ask Question
  44. ----- HyperTalk script -----
  45. on mouseUp
  46.   global numberVar1
  47.   global numberVar2
  48.   answer "What team retired Stan Musial's No. 6?" with "Indians" or "Yankees" or "Cardinals"
  49.   if it is "Cardinals" then
  50.     add "1" to numberVar1
  51.     put numberVar1 into field "number correct"
  52.     select text of field "number correct"
  53.     doMenu copy text
  54.     go next card
  55.     select text of field "number correct"
  56.     doMenu paste text
  57.     put numberVar2 into field "number wrong"
  58.     exit mouseUp
  59.   else add "1" to numberVar2
  60.   put numberVar2 into field "number wrong"
  61.   select text of field "number wrong"
  62.   doMenu copy text
  63.   doMenu "message"
  64.   beep
  65.   type "Cardinals"
  66.   wait 30
  67.   hide message box
  68.   wait 30
  69.   go next card
  70.   select text of field "number wrong"
  71.   doMenu paste text
  72.   put numberVar1 into field "number correct"
  73. end mouseUp
  74.  
  75.  
  76.  
  77.  
  78.  
  79.  
  80.  
  81.  
  82. --
  83.  
  84.  
  85. -- part contents for background part 2
  86. ----- text -----
  87. Correct Answers
  88.  
  89. -- part contents for background part 9
  90. ----- text -----
  91. Wrong
  92. Answers
  93.  
  94. -- part contents for background part 3
  95. ----- text -----
  96. 10
  97.  
  98. -- part contents for background part 11
  99. ----- text -----
  100. 4